home *** CD-ROM | disk | FTP | other *** search
/ SGI Developer Toolbox 6.1 / SGI Developer Toolbox 6.1 - Disc 4.iso / src / tutorials / geometer / Theorems / curves / spiral.T < prev    next >
Encoding:
Text File  |  1994-08-02  |  481 b   |  15 lines
  1. .geometry "version 0.1";
  2. v1 = .free(-0.135431, -0.072503, .invisible, "1");
  3. v2 = .free(0.890561, -0.072503, .invisible, "2");
  4. line = .l.vv(v1, v2, .longline);
  5. v3 = .vonl(line, 0.305062, -0.072503, .green, .plus);
  6. l = .len.vv(v1, v3);
  7. c = .c.vlen(v1, l);
  8. a = .len.f(15);
  9. aa = .len.times(a, l);
  10. vv = .v.avv(aa, v2, v1, .invisible);
  11. l1 = .l.vv(v1, vv, .longline);
  12. v4 = .v.lc(l1, c, 1, .smear);
  13. .text("This is a display hack.  Move the green vertex and");
  14. .text("generate a spiral.");
  15.